(*** AKE Scheme ***)(* Data types *)type Key.type Point.type Random.type ID.type Time.(* Chael Definition *)free net : chael. (* Private Terms *)free SKij : bitstring [private].free ai : Random [private].free aj : Random [private].free ki : Key [

(*** ISM Key Agreement Scheme ***)(* Chael Definition *)free net : chael. (* Private Terms *)free SK_esp_r : bitstring [private].free SK_r_i : bitstring [private].free IDw : bitstring [private].free PWw : bitstring [private].free IDr : bitstring

(********************** Key Establishment Protocol *************************)(* Data types *)type Key.type Point.type Random.type ID.(* Chael Definition *)free net : chael. (* Private Terms *)free SSKnm : Key [private].const skm : Key [private].c